home *** CD-ROM | disk | FTP | other *** search
/ Aminet 1 (Walnut Creek) / Aminet - June 1993 [Walnut Creek].iso / aminet / text / tex / tgrind.lha / TGrind / tgrindefs < prev    next >
Text File  |  1993-01-04  |  7KB  |  167 lines
  1. C|c:\
  2.     :pb=^\a?\p\d?\(\a?\)\d?($|{|/):bb={:be=}:cb=/*:ce=*/:sb=":se=\e":lb=':\
  3.     :le=\e':tl:\
  4.     :kw=asm auto break case char continue default do double else enum\
  5.     extern float for fortran goto if int long register return short\
  6.     sizeof static struct switch typedef union unsigned void while #define\
  7.     #else #endif #if #ifdef #ifndef #include #undef:
  8.     if ifdef ifndef include undef:
  9. CC|cc|cp|c++:\
  10.     :pb=^\a?\p\d?\(\a?\)(\d|{):bb={:be=}:cb=/*:ce=*/:\
  11.     :ab=//:ae=$:sb=":se=\e":lb=':le=\e':tl:\
  12.     :kw=asm auto break case char class const continue default do double\
  13.     else enum extern float for fortran goto if int long protected\
  14.     public register return short sizeof static struct switch typedef\
  15.     union unsigned virtual void while #define #else #endif #if\
  16.     #ifdef #ifndef #include #undef:
  17. pascal|pasc|p:\
  18.     :pb=(^\d?procedure|function|program\d\p\d|\(|;|\:)|(=\d?record\d):\
  19.     :bb=\dcase|begin\d:be=\dend|forward\d|;:\
  20.     :oc:\
  21.     :cb={:ce=}:ab=\(*:ae=*\):\
  22.     :sb=':se=':lb=":le=":\
  23.     :kw=and array assert begin boolean case const div do downto else end file for\
  24.     forward function goto if in integer label mod nil not of or packed procedure\
  25.     program record repeat set then to type until var while with oct hex\
  26.     external:
  27. Icon|icon|I:\
  28.     :pb=^\d?procedure\d\p\d?\(\a?\):\
  29.     :bb=(^\d?procedure\d\p\d?\(\a?\))|{:be=}|(^\d?end\d?$):\
  30.     :cb=#:ce=$:\
  31.     :sb=":se=\e":lb=':le=\e':tl:\
  32.     :kw=break by case create default do dynamic else end every external\
  33.     fail global if initial local next not of procedure record\
  34.     repeat return static suspend then to until using while:
  35. SH|sh:\
  36.     :bb={:be=}:cb=#:ce=$:sb=":se=\e":lb=':\
  37.     :le=\e':tl:\
  38.     :kw=break case cd continue do done \
  39.     elif else esac eval exec exit export \
  40.     fi for if in then while until \
  41.     read readonly set shift test trap umask wait:
  42. CSH|csh:\
  43.     :bb={:be=}:cb=#:ce=$:sb=":se=\e":lb=':\
  44.     :le=\e':tl:\
  45.     :kw=alias alloc break breaksw case cd chdir continue default\
  46.     echo else end endif endsw exec exit foreach \
  47.     glob goto history if logout nice nohup onintr repeat set\
  48.     setenv shift source switch then time \
  49.     while umask unalias unset wait while @ env \
  50.     argv child home ignoreeof noclobber noglob \
  51.     nomatch path prompt shell status verbose :
  52. TEX|tex:\
  53.     :bb={:be=}:cb=%:ce=$:kw=\\def:
  54. mf|metafont:\
  55.     :bb={:be=}:cb=%:ce=$:\
  56.     :kw=def if else fi for step until endfor\
  57.     input let end:
  58. SOURCE|source|src:\
  59.     :kw=:
  60. prolog|PROLOG:\
  61.     :bb=\:-:be=.:cb=%:ce=$:ab=/*:ae=*/:\
  62.     :sb=":se=\e":lb=':le=\e':oc:\
  63.     :kw=op mod abort ancestors arg ascii ask assert asserta assertz\
  64.     atom atomic char clause close concat consult ed ef em eof fail\
  65.     file findall write functor getc integer is length listing load name\
  66.     nl nonvar not numbervars op or pp prin print private prompt putc\
  67.     ratom read read_from_this_file rename repeat retract retractall\
  68.     save see seeing seen sh skip statistics subgoal_of system tab\
  69.     tell telling time told trace true unload untrace var write:
  70. r|R|ratfor:\
  71.     :pb=^\d?program|subroutine|function|(integer|real|complex|character\dfunction)\d\p\d|\(:\
  72.     :bb={:be=}:cb=#:ce=$:sb=":se=":lb=':le=':oc:\
  73.     :kw= break call case character common complex data default define\
  74.     dimension do else end equivalence external false for function go\
  75.     goto if implicit include integer logical next pause program read\
  76.     real repeat return rewind stop string subroutine switch true until\
  77.     while write:
  78. modula2|mod2|m2:\
  79.     :pb=(^\d?(procedure|function|module)\d\p\d|\(|;|\:):\
  80.     :bb=\d(begin|case|for|if|loop|record|repeat|while|with)\d:\
  81.     :be=\dend|;:\
  82.     :cb={:ce=}:\
  83.     :ab=\(*:ae=*\):\
  84.     :sb=":se=":\
  85.     :oc:\
  86.     :kw=and array begin by case const\
  87.     definition div do else elsif end exit export\
  88.     for from if implementation import in\
  89.     loop mod module not of or pointer procedure qualified\
  90.     record repeat return set then to type\
  91.     until var while with:
  92. yacc|Yacc|y:\
  93.     :cb=/*:ce=*/:sb=":se=\e":lb=':le=\e':tl:\
  94.     :kw=%{ %} %% %union %token %type\
  95.     #else #endif #if #ifdef #ifndef #include #undef # define else endif\
  96.     if ifdef ifndef include undef:
  97. asm68:\
  98.     :pb=(^\d?.proc\d\p\d:\
  99.     :oc:\
  100.     :cb=;:ce=$:\
  101.     :sb=':se=':lb=":le=":\
  102.     :kw=ascii block byte end equ include long proc word:
  103. a68:\
  104.     :oc:\
  105.     :cb=\|:ce=$:ab=/*:ae=*/:\
  106.     :sb=':se=':lb=":le=":\
  107.     :kw=ascii block byte end equ globl text data word even long\
  108.     #else #endif #if #ifdef #ifndef #include #undef #define:
  109. vmsasm:\
  110.     :pb=^\d?.entry\d\p(\d|,|$|;):\
  111.     :oc:\
  112.     :cb=;:ce=$:\
  113.     :sb=(.ident|.asci(x|c|d|i|z))\d:se=$:\
  114.     :kw=.address .align .ascix .ascic .ascid .ascii .asciz \
  115.     .blkx .byte .cross .debug .default .d_floating .double \
  116.     .disable .enable .end .endc .endm .endr .entry .error \
  117.     .even .external .f_floating .float .g_floating .ident .if \
  118.     .if_x .iff .irp .irpc .library .link .list .long .macro \
  119.     .mask .mcall .mdelete .mexit .narg .nchr .nlist .nocross \
  120.     .noshow .ntype .octa .odd .opdef .packed .page .print \
  121.     .psect .quad .refn .repeat .restore_psect .save_psect \
  122.     .show .signed_byte .signed_word .subtitle .title .transfer \
  123.     .warn .weak .word:
  124. asm:\
  125.     :oc:\
  126.     :cb=#:ce=$:ab=/*:ae=*/:\
  127.     :sb=':se=':lb=":le=":\
  128.     :kw=ascii block byte end equ globl text data word even long\
  129.     #else #endif #if #ifdef #ifndef #include #undef #define else endif\
  130.     if ifdef ifndef include undef define:
  131. ps|postscript:\
  132.     :oc:\
  133.     :cb=%:ce=$:\
  134.     :sb=\(:se=\e\):\
  135.     :kw=forall array null dict begin end def store string \
  136.     exec if ifelse repeat for loop exit stop stopped quit \
  137.     start save restore gsave grestore grestoreall definefont \
  138.     newpath initgraphics erasepage showpage copypage initclip \
  139.     clip eoclip fill eofill stroke image imagemask:
  140. model|mod|m:\
  141.     :pb=^\d(space\d\p\drep)|(\p\dis|inline|public\dbeginproc):\
  142.     :bb=\dbeginproc|space|case\d:be=\dendproc|end\d|;:\
  143.     :cb=\$:ce=\$|$:sb=":se=":lb=':le=\a|$:\
  144.     :kw=abs and array beginproc boolean by case cdnl char copied dispose\
  145.     div do dynamic else elsif end endproc entry external FALSE false\
  146.     fi file for formal fortran global if iff ift\
  147.     in integer include inline is lbnd\
  148.     max min mod new NIL nil noresult not notin od of or procedure public\
  149.     read readln readonly record recursive rem rep repeat res\
  150.     result return set\
  151.     space string subscript such then TRUE true type ubnd union until\
  152.     varies while width:
  153. ISP|isp|i:\
  154.     :cb=!:ce=!|$:oc:\
  155.     :kw=and begin decode define end eql eqv geq gtr if leave leq lss mod\
  156.     neq next not or otherwise repeat restart resume sr0 sr1 srd srr sl0 sl1\
  157.     sld slr tst xor:
  158. ldl|LDL:\
  159.     :pb=^\p\::bb=\::be=;:cb=/*:ce=*/:sb=":se=\e":\
  160.     :kw=constant functions grammar reswords tokens add1 addste\
  161.     car cdr check colno cond cons copy defun divide empty enter\
  162.     eq equal findattr firstchild ge getattr getfield gt hash label\
  163.     lambda lastchild le leftsibling lookone lookup lt minus name ne\
  164.     newnode nextcom nil null parent plus precnl prevcom prog progn\
  165.     quote reglob return rightsibling self set setattr setfield setq\
  166.     stjoin sub1 t times tnull tokno ttype:
  167.